home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / prog / atari / m2 / cat3src / cat / arcass.d next >
Text File  |  1997-10-26  |  588b  |  28 lines
  1. DEFINITION MODULE ARCAss;
  2.  
  3. FROM SYSTEM IMPORT ADDRESS;
  4.  
  5. TYPE    outProcType     = PROCEDURE ( (* char : *) CHAR);
  6.  
  7. PROCEDURE SetTrap();
  8.  
  9. PROCEDURE RestoreTrap();
  10.  
  11. PROCEDURE TrapProc();
  12.  
  13. PROCEDURE SetCharAddress(adr : ADDRESS);
  14. (* Adresse, an der Speicheradresse fr das auszugebende Zeichen *)
  15.  
  16. PROCEDURE SetNewProc(adr : ADDRESS);
  17. (* Adresse der auszufhrenden Proc *)
  18.  
  19. PROCEDURE SetOutputProc (p: ADDRESS);
  20. (* Setzt die Ausgabeprozedur fr die Ausgabeumlenkung
  21.  *)
  22.  
  23. PROCEDURE ClearOutputProc ();
  24. (* L”scht eine ggf. gesetzte Ausgabeprozedur 
  25.  *)
  26.  
  27. END ARCAss.
  28.